(w32font_get_cache): Adjust the argument type.

diff --git a/src/w32font.c b/src/w32font.c
index 3a8ad108a514c79f36a150a67d6f85ab025bcc87..3ac6001c18107dce11a49e74267f019158d14905 100644 (file)
--- a/src/w32font.c
+++ b/src/w32font.c
@@ -135,10 +135,10 @@ memq_no_quit (elt, list)
    Return a cache of font-entities on FRAME.  The cache must be a
    cons whose cdr part is the actual cache area.  */
 Lisp_Object
-w32font_get_cache (frame)
-     Lisp_Object frame;
+w32font_get_cache (f)
+     FRAME_PTR f;
 {
-  struct w32_display_info *dpyinfo = FRAME_X_DISPLAY_INFO (XFRAME (frame));
+  struct w32_display_info *dpyinfo = FRAME_X_DISPLAY_INFO (f);
 
   return (dpyinfo->name_list_element);
 }